home *** CD-ROM | disk | FTP | other *** search
/ 64'er Special 57 / 64er_Magazin_Sonderheft_57_19xx_Markt__Technik_de_Side_B.d64 / zeichensatz show (.txt) < prev   
Commodore BASIC  |  2022-10-26  |  485b  |  15 lines
  1. 10 ifa=0thena=1:print"neuer zeichensatz wird geladen":load"kaiser zei."
  2. 15 ifa=2then110
  3. 20 poke53248+24,25
  4. 30 printchr$(147)
  5. 40 print"[196]ies ist der [218]eichensatz von <[203]aiser>:"
  6. 50 forz=0to255:poke1024+360+z,z:next
  7. 60 print"[215]ie [211]ie sehen beherrscht der [218]eichensatzdie deutschen [213]mlaute."
  8. 70 print:print"[205]it freundlichen [199]r[219][192]en"
  9. 80 print:print"[202][255]rg [194]rokamp       <taste>"
  10. 90 wait198,1:printchr$(147)
  11. 100 ifa=1thena=2:load"katakis zeich.",8,1
  12. 110 print"auch der zeichensatz von katakis ist    nicht schlecht"
  13. 120 forz=0to255:poke1024+160+z,z:next
  14. 130 poke198,0:wait198,1
  15.